SIVOCS

Age distribution

No trace type specified:
  Based on info supplied, a 'histogram' trace seems appropriate.
  Read more about this trace type -> https://plotly.com/r/reference/#histogram
No trace type specified:
  Based on info supplied, a 'histogram' trace seems appropriate.
  Read more about this trace type -> https://plotly.com/r/reference/#histogram

cross_den <-
  ggplot(df,
         aes(y = groupsInvolved.civsoc., x = transdisciplinaryExp.rate.)
         ) +
  geom_smooth(
    method = lm,
    se = TRUE,
    fullrange = TRUE,
    color = '#e7298a'
  ) +
  geom_jitter(color = '#377eb8') +
  theme_minimal() +
  geom_point(color = '#377eb8') +
  theme(legend.position = "top")

cross_den